home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 49 / Amiga Format CD49 (2000-01-17)(Future Publishing)(GB)(Track 1 of 3)[!][issue 2000-02].iso / start_here! < prev    next >
Text File  |  1999-11-10  |  828b  |  29 lines
  1. Set AFCDVIEW AFCDView
  2. FailAt 21
  3. Stack 20000
  4.  
  5. ;check whether user has installed AFCDView
  6. If NOT EXISTS C:AFCDView
  7.     set INSTALL `RequestChoice "Request" "AFCDView does not appear to be installed on your system. Do you wish to install it?"    "Yes|No"`
  8.     If $INSTALL EQ 1
  9.         Copy >NIL: :+System+/C/AFCDView TO C: CLONE
  10.         If $RC EQ 20
  11.             RequestChoice >NIL: "Information" "Sorry. Installation failed. Running AFCDView from the CD." "Continue"
  12.             Set AFCDVIEW :+System+/c/AFCDView
  13.         EndIf
  14.     Else
  15.         Set AFCDVIEW :+System+/c/AFCDView
  16.     EndIf
  17. EndIf
  18.  
  19. ;get vol name
  20. set VOLNAME `cd`
  21.  
  22. ;go for it!
  23. If EXISTS ENV:SeenIt
  24.     Run >NIL: <NIL: $AFCDVIEW $VOLNAME-Websites-/-Amiga_Format-/frames.ben.html
  25. Else
  26.     Run >NIL: <NIL: $AFCDVIEW $VOLNAME-Websites-/start.html
  27.     SetENV SeenIt 1
  28. EndIf
  29.